<?php
/**
 * @Author: king
 * @Last Modified by:   king
 * Date: 2018/6/19
 * Time: 14:30
 */

namespace App\Http\Controllers\Api\v1\Pay;

use App\Http\Controllers\Api\v1\Auth\BaseController;
use App\Http\Controllers\Api\BaseController;

/**
 * @title 微信支付相关接口
 * @desc 微信支付
 * @url
 * @version 1.1.1
 * Class Weixin
 * @package app\api\controller\v2
 */
class WeixinController extends BaseController
{
    // 支付请求地址
    const URL = 'https://api.mch.weixin.qq.com/pay/unifiedorder';
    // 订单查询请求地址
    const QURL = 'https://api.mch.weixin.qq.com/pay/orderquery';
    // 申请退款请求地址
    const RURL = 'https://api.mch.weixin.qq.com/secapi/pay/refund';
    // 查询退款请求地址
    const RQURL = 'https://api.mch.weixin.qq.com/pay/refundquery';

    /**
     * 生成订单
     * @param $body string 商品名字
     * @param $out_trade_no string 订单号
     * @param $total_amount
     * @param $trade_type string 支付类型
     * @param array $wxConfig 微信配置
     * @param string $openid
     * @return array
     */
    public function pay($body, $out_trade_no, $total_amount, string $trade_type = "APP", array $wxConfig, string $openid = '')
    {
        $data["appid"] = $wxConfig['appid'];
        $data["body"] = $body;
        $data["mch_id"] = $wxConfig['mchid'];
        $data["nonce_str"] = $this->getRandChar(32);
        $data["notify_url"] = $wxConfig['notify_url'];
        $data["out_trade_no"] = $out_trade_no;
        $data["spbill_create_ip"] = request()->ip();// $this->get_client_ip()
        $data["total_fee"] = $total_amount;
        if ($trade_type == 'JSAPI')
        {
            $data['openid'] = $openid;
        }
        $data["trade_type"] = $trade_type !== 'H5' ? $trade_type : 'MWEB';
        $data['sign_type'] = 'MD5';
        //当是H5支付时，传递的场景值 json格式
        if ($trade_type == 'H5')
        {
            $sceneInfo = [
                'h5_info' => [
                    'type' => 'WAP',
                    'wap_url' => config('host.wap_domain'),
                    'wap_name' => '准吖',
                ]
            ];
            $data['scene_info'] = json_encode($sceneInfo);
        }

        //按照参数名ASCII字典序排序并且拼接API密钥生成签名
        $s = $this->getSign($data, $wxConfig);
        $data["sign"] = $s;
        //配置xml最终得到最终发送的数据
        $xml = $this->arrayToXml($data);
//        \think\Log::write('WxPay_POST:'. json_encode($data),'log',true);

        $response = $this->postXmlCurl($xml, self::URL);

        $response = $this->xmlstr_to_array($response);

//         \think\Log::write('WxPay_Respones:'. json_encode($response),'log',true);
        //将微信返回的结果xml转成数组
        return $response;
    }

    //进行签名
    public function getSign($Obj, $wxConfig)
    {
        foreach ($Obj as $k => $v)
        {
            $Parameters[strtolower($k)] = $v;
        }
        //签名步骤一：按字典序排序参数
        ksort($Parameters);
        $String = $this->formatBizQueryParaMap($Parameters, false);
//        $String = http_build_query($Parameters);
        //签名步骤二：在string后加入KEY
        $String = $String . "&key=" . $wxConfig['api_key'];
        //签名步骤三：MD5加密
        $result_ = strtoupper(md5($String));
        return $result_;
    }

    //进行签名，jsapi使用
    public function getSignOfJsApi($Parameters, $wxConfig)
    {
//        foreach ($Obj as $k => $v)
//        {
//            $Parameters[strtolower($k)] = $v;
//        }
        //签名步骤一：按字典序排序参数
        ksort($Parameters);
        $String = $this->formatBizQueryParaMapOfJsApi($Parameters, false);
//        $String = http_build_query($Parameters);
        //签名步骤二：在string后加入KEY
        $String = $String . "&key=" . $wxConfig['api_key'];
        //签名步骤三：MD5加密
        $result_ = strtoupper(md5($String));
        return $result_;
    }

    //获取指定长度的随机字符串
    public function getRandChar($length)
    {
        $str = null;
        $strPol = "ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789abcdefghijklmnopqrstuvwxyz";
        $max = strlen($strPol) - 1;

        for ($i = 0; $i < $length; $i++)
        {
            $str .= $strPol[rand(0, $max)];//rand($min,$max)生成介于min和max两个数之间的一个随机整数
        }

        return $str;
    }

    //获取当前服务器的IP
    function get_client_ip()
    {
        if ($_SERVER['REMOTE_ADDR'])
        {
            $cip = $_SERVER['REMOTE_ADDR'];
        } elseif (getenv("REMOTE_ADDR"))
        {
            $cip = getenv("REMOTE_ADDR");
        } elseif (getenv("HTTP_CLIENT_IP"))
        {
            $cip = getenv("HTTP_CLIENT_IP");
        } else
        {
            $cip = "unknown";
        }
        return $cip;
    }

    //将数组转成uri字符串
    protected function formatBizQueryParaMap($paraMap, $urlencode)
    {
        $buff = "";
        $reqPar = '';
        ksort($paraMap);
        foreach ($paraMap as $k => $v)
        {
            if ($urlencode)
            {
                $v = urlencode($v);
            }
            $buff .= strtolower($k) . "=" . $v . "&";
        }
        if (strlen($buff) > 0)
        {
            $reqPar = substr($buff, 0, strlen($buff) - 1);
        }
        return $reqPar;
    }

    //将数组转成uri字符串，公众号支付使用
    protected function formatBizQueryParaMapOfJsApi($paraMap, $urlencode = false)
    {
        $buff = "";
        ksort($paraMap);
        foreach ($paraMap as $k => $v) {
            if (null != $v && "null" != $v) {
                if ($urlencode) {
                    $v = urlencode($v);
                }
                $buff .= $k . "=" . $v . "&";
            }
        }
        $reqPar = '';
        if (strlen($buff) > 0) {
            $reqPar = substr($buff, 0, strlen($buff) - 1);
        }
        return $reqPar;
    }

    /**
     * 数组转xml
     * @param $arr
     * @return string
     */
    public function arrayToXml($arr)
    {
        $xml = "<xml>";
        foreach ($arr as $key => $val)
        {
            if (is_numeric($val))
            {
                $xml .= "<" . $key . ">" . $val . "</" . $key . ">";

            } else
                $xml .= "<" . $key . "><![CDATA[" . $val . "]]></" . $key . ">";
        }
        $xml .= "</xml>";
        return $xml;
    }

    //post https请求，CURLOPT_POSTFIELDS xml格式
    public function postXmlCurl($xml, $url, $second = 30)
    {
        //初始化curl
        $ch = curl_init();
        $header = array('Content-Type:application/x-www-form-urlencoded;charset=utf-8');
        curl_setopt($ch, CURLOPT_HTTPHEADER, $header);
        //超时时间
        curl_setopt($ch, CURLOPT_TIMEOUT, $second);
        //这里设置代理，如果有的话
        curl_setopt($ch, CURLOPT_URL, $url);
        curl_setopt($ch, CURLOPT_SSL_VERIFYPEER, false);
        curl_setopt($ch, CURLOPT_SSL_VERIFYHOST, false);
        //设置header
        curl_setopt($ch, CURLOPT_HEADER, false);
        //要求结果为字符串且输出到屏幕上
        curl_setopt($ch, CURLOPT_RETURNTRANSFER, true);
        //post提交方式
        curl_setopt($ch, CURLOPT_POST, true);
        curl_setopt($ch, CURLOPT_POSTFIELDS, $xml);
        //运行curl
        $data = curl_exec($ch);
        //返回结果
        if ($data)
        {
            curl_close($ch);
            return $data;
        } else
        {
            $error = curl_errno($ch);
            curl_close($ch);
            return false;
        }
    }

    /**
     * xml转成数组
     */
    public function xmlstr_to_array($xmlstr)
    {
        $doc = new \DOMDocument();
        $doc->loadXML($xmlstr);
        return $this->domnode_to_array($doc->documentElement);
    }

    public function domnode_to_array($node)
    {
        $output = array();
        switch ($node->nodeType)
        {
            case XML_CDATA_SECTION_NODE:
            case XML_TEXT_NODE:
                $output = trim($node->textContent);
                break;
            case XML_ELEMENT_NODE:
                for ($i = 0, $m = $node->childNodes->length; $i < $m; $i++)
                {
                    $child = $node->childNodes->item($i);
                    $v = $this->domnode_to_array($child);
                    if (isset($child->tagName))
                    {
                        $t = $child->tagName;
                        if (!isset($output[$t]))
                        {
                            $output[$t] = array();
                        }
                        $output[$t][] = $v;
                    } elseif ($v)
                    {
                        $output = (string)$v;
                    }
                }
                if (is_array($output))
                {
                    if ($node->attributes->length)
                    {
                        $a = array();
                        foreach ($node->attributes as $attrName => $attrNode)
                        {
                            $a[$attrName] = (string)$attrNode->value;
                        }
                        $output['@attributes'] = $a;
                    }
                    foreach ($output as $t => $v)
                    {
                        if (is_array($v) && count($v) == 1 && $t != '@attributes')
                        {
                            $output[$t] = $v[0];
                        }
                    }
                }
                break;
        }
        return $output;
    }

    /**
     * 微信支付查询
     * 文档地址： https://pay.weixin.qq.com/wiki/doc/api/app/app.php?chapter=9_2&index=4
     * @param $out_trade_no
     * @param array $wxConfig
     * @return array|bool|string
     */
    public function query($out_trade_no, array $wxConfig)
    {
        $data["appid"] = $wxConfig['appid'];
        $data["mch_id"] = $wxConfig['mchid'];
        $data["nonce_str"] = $this->getRandChar(32);
        $data["out_trade_no"] = $out_trade_no;
        $s = $this->getSign($data, $wxConfig);
        $data['sign'] = $s;

        $xml = $this->arrayToXml($data);

        $response = $this->postXmlCurl($xml, self::QURL);

        $response = $this->xmlstr_to_array($response);

        return $response;
    }

    /**
     * 微信退款
     * 文档地址： https://pay.weixin.qq.com/wiki/doc/api/app/app.php?chapter=9_4&index=6
     * @param $data
     *  out_trade_no 商户订单号
     *  total_fee   订单金额
     *  refund_fee 退款金额
     *  refund_desc 退款原因
     *  notify_url 退款结果通知url
     * @param array $wxConfig
     * @return array|bool|string
     */
    public function refund(array $data, array $wxConfig)
    {
        $data["appid"] = $wxConfig['appid'];
        $data["mch_id"] = $wxConfig['mchid'];
        $data["nonce_str"] = $this->getRandChar(32);
        $data['sign'] = $this->getSign($data, $wxConfig);

        $xml = $this->arrayToXml($data);

        $response = $this->postXmlCurl($xml, self::QURL);

        $response = $this->xmlstr_to_array($response);

        return $response;
    }

    /**
     * 微信退款查询
     * 文档地址： https://pay.weixin.qq.com/wiki/doc/api/app/app.php?chapter=9_4&index=6
     * @param $out_trade_no
     * @param array $wxConfig
     */
    public function refundQuery($out_trade_no, array $wxConfig)
    {

    }
}
